CommonEvent 2504
Name = "誘惑：クィーンローチ"

  999([2151])
  Script(["$game_troop.lose_event_id = 3504"])
  ControlVariables([26, 26, 0, 3, 3, 1, 4])
  ControlVariables([26, 26, 4, 0, 10])
  ShowTextAttributes(["queenroach_fc1", 0, 0, 2])
  ShowText(["\\n<Queen Roach>I'll be at a disadvantage if this keeps up...\nI suppose I should make an offer."])
  ShowText([""])
  ShowText([""])
  Script(["battler_graphic_hide"])
  ShowPicture([5, "ev_queenroach_h08", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Queen Roach embraces Luka's body in her arms!\nOne of the egg sacs on her crotch opens wide!"])
  ShowText([""])
  ShowTextAttributes(["queenroach_fc1", 0, 0, 2])
  ShowText(["\\n<Queen Roach>I shall allow you to inseminate this egg sac.\nYou shall get to experience the finest pleasure as you release plenty of your seed..."])
  ShowText([""])
  ShowText([""])
  ControlSwitches([98, 98, 0])
  ControlSwitches([96, 96, 0])
  ShowChoices([["Push her off", "Accept"], 1])
  When([0, "はねのける"])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText(["Luka resists her temptation!"])
    CallCommonEvent([1999])
    ExitEventProcessing([])
    Empty([])

  When([1, "受け入れる"])
    Empty([])

  ChoicesEnd([])
  ShowTextAttributes(["queenroach_fc1", 0, 0, 2])
  ShowText(["\\n<Queen Roach>It appears we have a deal.\nNow then, you may give your seed to my eggs..."])
  ShowText([""])
  ShowText([""])
  ControlVariables([26, 26, 3, 0, 6])
  PlaySE(["RPG::SE(@name=\"mon_ero_pyu4\", @pitch=100, @volume=100)"])
  ShowPicture([5, "ev_queenroach_h12", 0, 0, 0, 0, 100, 100, 255, 0])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Queen Roach's egg sac covers Luka's penis!"])
  ShowText(["Its sticky feel wraps around his dick, giving him intense pleasure!\\D"])
  ShowText(["Luka takes \\V[26] damage!"])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ConditionalBranch([1, 27, 0, 0, 0])
    JumpToLabel(["射精1"])
    Empty([])

  BranchEnd([])
  ShowTextAttributes(["queenroach_fc1", 0, 0, 2])
  ShowText(["\\n<Queen Roach>Kuku, is it unbearable...?\nYou can release plenty of your seed inside it."])
  ShowText([""])
  ShowText([""])
  PlaySE(["RPG::SE(@name=\"mon_ero_koki1\", @pitch=100, @volume=100)"])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Her entire egg sac squirms, sweetly stimulating Luka's penis!"])
  ShowText(["The intense pleasure causes an ejaculation to well up!\\D"])
  ShowText(["Luka takes \\V[26] damage!"])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ConditionalBranch([1, 27, 0, 0, 0])
    JumpToLabel(["射精1"])
    Empty([])

  BranchEnd([])
  Label(["射精1"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Hauuu...!!"])
  ShowText([""])
  CallCommonEvent([104])
  ShowPicture([5, "ev_queenroach_h13", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Like that, I ejaculated inside her egg sac.\nMy penis throbs as copious amounts of semen gush out..."])
  ShowText([""])
  ShowTextAttributes(["queenroach_fc1", 0, 0, 2])
  ShowText(["\\n<Queen Roach>Kuku, you fertilized so many eggs.\nThe inside of my egg sac is filled with your seed."])
  ShowText([""])
  ShowText([""])
  CallCommonEvent([2000])
  ExitEventProcessing([])
  Empty([])
